home *** CD-ROM | disk | FTP | other *** search
/ Publication 50 / Publication_50_2003_Civitas_de_Disk_2_of_2_Side_B.d64 / bas3x3 1 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  91b  |  8 lines
  1. 0 poke53272,29
  2. 10 a=1
  3. 20 fori=0to2
  4. 30 forx=0to2
  5. 40 poke1024+x*40+i,a*9+q:q=q+1
  6. 50 nextx
  7. 60 nexti
  8.